home *** CD-ROM | disk | FTP | other *** search
/ CrystalVision Software Se… Wiki Wonder - Wikipedia / CrystalVision Software Services 703: The Wiki Wonder - Wikipedia.iso / juno / jsetup.exe / data1.cab / lib / filters.vbs < prev    next >
Encoding:
Text File  |  2001-11-09  |  1.1 KB  |  29 lines
  1. ' This file contains the system filters
  2.  
  3. Option Explicit
  4.  
  5. ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
  6. 'Save all sent mail filter
  7.  
  8. Function Filter_Message_System_Log_Outgoing_Mail_Name
  9.     Filter_Message_System_Log_Outgoing_Mail_Name = Application.LoadString(IDS_FILTER_MESSAGE_SYSTEM_LOG_OUTGOING_MAIL_NAME)
  10. End Function
  11.  
  12. Function Filter_Message_System_Log_Outgoing_Mail_Description
  13.     Filter_Message_System_Log_Outgoing_Mail_Description = Application.LoadString(IDS_FILTER_MESSAGE_SYSTEM_LOG_OUTGOING_MAIL_DESCRIPTION)
  14. End Function
  15.  
  16. Function Filter_Message_System_Log_Outgoing_Mail_Terminal
  17.     Filter_Message_System_Log_Outgoing_Mail_Terminal = False
  18. End Function
  19.  
  20. Function Filter_Message_System_Log_Outgoing_Mail(Message)
  21.     If True Then
  22.         Filter_Message_System_Log_Outgoing_Mail = False
  23.         If Not Action_Message_CopyToFolder_Folder(Message, Application.LoadString(IDS_JMAIL_SENT)) Then Exit Function
  24.         Filter_Message_System_Log_Outgoing_Mail = True
  25.     Else
  26.         Filter_Message_System_Log_Outgoing_Mail = True
  27.     End If
  28. End Function
  29.